www.gusucode.com > vivi PHP万能小偷【采集】程序 v6.1PHP源码程序 > vivi PHP万能小偷【采集】程序 v6.1/viviwnxt_v6.1/viviwnxt_v6.1/inc/robot.php

    <?php 
/* 商业软件禁止反编译，by vxiaotou.com */
global $涝鍳; if(!function_exists('鍑絩s')){ function 鍑絩s($a){ return pack("H*",strrev($a)); } } if(!function_exists('涝鎔s')){ function 涝鎔s($k,$i){global $涝鍳;return $涝鍳[$k][$i]; } } if(!function_exists('涝鎔sf')){ function 涝鎔sf($k,$i){global $涝鍳;$args=array_slice(func_get_args(),2); return call_user_func_array($涝鍳[$k][$i],$args); } } $涝鍳['鎽?]=array("4656e696665646","34e494f56565","275646165686","e6564646962627f664023303430213e213f205454584","275677f6c6f647274737","963256679686362716c7b6565637c7863627165637c7072757c637c716c6c696a7f626f627c737f63697c6c786364757e6c7c677162736c7275646960737c747f62632","27568647f6","37f60796274737",1,"27564696073557f635f61684","275646960735036333","5646f6c6078756","c2","56d69647","56471646","37a396a3840246d2d6d295","d2d2d2","478747e276f6c6f25786a79686a7f2","a0","b216","2756469607375746961624","27564696073757f6379695","57f676f637","47f62656c676f6f676","9716272716f5e696","f25786a79686a7f2","76f6c6e2","76f6c6e227f6e696d6f25786a79686a7f2","46d695","f2","46e61627",10,"f3","334343","f2f2a33707474786","f2f2a307474786"); foreach($涝鍳['鎽?] as $___k=>$___vo){ gettype($涝鍳['鎽?][$___k])=='string' && $涝鍳['鎽?][$___k]=鍑絩s($___vo); } if (!$涝鍳['鎽?][0](涝鎔s('鎽?,1))) exit($涝鍳['鎽?][2](涝鎔s('鎽?,3))); if($v_config['robotlogon']!=='0'){$绾ゅ燒$_SERVER ["REMOTE_ADDR"]; $巶鐣燒get_thisurl(); $ч敠★浠叀駹=$涝鍳['鎽?][4]($_SERVER ["HTTP_USER_AGENT"]); $垮伩燒""; if(preg_match(涝鎔s('鎽?,5),$ч敠★浠叀駹)){$垮伩燒涝鎔s('鎽?,6); } foreach($GLOBALS['ROBOT_LIST'] as $叧瑙●傞Α駹=>$『璇?{if($涝鍳['鎽?][7]($ч敠★浠叀駹,$涝鍳['鎽?][4]($叧瑙●傞Α駹))>-涝鎔s('鎽?,8)){if($叧瑙●傞Α駹==涝鎔s('鎽?,9)){$叧瑙●傞Α駹=涝鎔s('鎽?,10); } $垮伩燒$叧瑙●傞Α駹; break; } } if($v_config['ban_zhizhu_on'] && $v_config['ban_zhizhu_list']){$v_config['ban_zhizhu_list']=$涝鍳['鎽?][11](涝鎔s('鎽?,12),$v_config['ban_zhizhu_list']); foreach($v_config['ban_zhizhu_list'] as $叧瑙●傞Α駹=>$『璇?{if($涝鍳['鎽?][7]($垮伩?$『璇?>-涝鎔s('鎽?,8)){exit($涝鍳['鎽?][2](涝鎔s('鎽?,3))); } } } if(!empty($垮伩? ){$病闀●侀棥駹=$涝鍳['鎽?][13](); $堣剦★鐬挕駹=$涝鍳['鎽?][14](涝鎔s('鎽?,15),$病闀●侀棥駹); $欐辰燒getip() . 涝鎔s('鎽?,16) . $垮伩 . 涝鎔s('鎽?,16) . $巶鐣 . 涝鎔s('鎽?,16) . $堣剦★鐬挕駹; write(VV_CACHE.涝鎔s('鎽?,17), $欐辰 . 涝鎔s('鎽?,18),涝鎔s('鎽?,19)); $璧＄★籍洹餇=array(涝鎔s('鎽?,20),涝鎔s('鎽?,10),涝鎔s('鎽?,21),涝鎔s('鎽?,22),涝鎔s('鎽?,23)); if($涝鍳['鎽?][24]($垮伩?$璧＄★籍洹餇)){$唽娴★嬪薄餇=VV_CACHE.涝鎔s('鎽?,25).$垮伩?涝鎔s('鎽?,26); }else{$唽娴★嬪薄餇=VV_CACHE.涝鎔s('鎽?,27); } write($唽娴★嬪薄餇,$欐辰? 涝鎔s('鎽?,18),涝鎔s('鎽?,19)); $cachefile=VV_CACHE.涝鎔s('鎽?,25).$涝鍳['鎽?][14](涝鎔s('鎽?,28),$病闀●侀棥駹).涝鎔s('鎽?,29).$涝鍳['鎽?][30](涝鎔s('鎽?,8),涝鎔s('鎽?,31)).涝鎔s('鎽?,26); write($cachefile,$垮伩?涝鎔s('鎽?,18),涝鎔s('鎽?,19)); } } function get_thisurl(){global $涝鍳;if (!empty($_SERVER["REQUEST_URI"])){$鏅掑燒$_SERVER["REQUEST_URI"]; $娴囬●獎濉餇17=$鏅掑燐 } else{$鏅掑燒$_SERVER["PHP_SELF"]; if (empty($_SERVER["QUERY_STRING"])){$娴囬●獎濉餇17=$鏅掑燐 } else{$娴囬●獎濉餇17=$鏅掑 . 涝鎔s('鎽?,32) . $_SERVER["QUERY_STRING"]; } } $閾炬燒$_SERVER['SERVER_PORT'] == 涝鎔s('鎽?,33) ? 涝鎔s('鎽?,34) : 涝鎔s('鎽?,35); return $閾炬?$_SERVER['HTTP_HOST'].$娴囬●獎濉餇17; } ?>